home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / istar / install_istar < prev    next >
Encoding:
Text File  |  1996-09-13  |  2.0 KB  |  114 lines
  1. ;;
  2. ;; Install_Istar - Istar installation script for Installer
  3. ;;
  4. ;; Copyright © Andrew Basden, June 1996
  5. ;;
  6. ;;     Installer and Installer project icon
  7. ;;     (c) Copyright 1991-93 Commodore-Amiga, Inc.  All Rights Reserved.
  8. ;;     Reproduced and distributed under license from Commodore.
  9. ;;
  10. ;;     INSTALLER SOFTWARE IS PROVIDED "AS-IS" AND SUBJECT TO CHANGE;
  11. ;;     NO WARRANTIES ARE MADE.  ALL USE IS AT YOUR OWN RISK.  NO LIABILITY
  12. ;;     OR RESPONSIBILITY IS ASSUMED.
  13. ;;
  14.  
  15. (set @path
  16.     (askdir 
  17.          (default "work:")
  18.          (prompt "Where do you want to install Istar (a new Istar diretory will be created here) ?")
  19.         (help @makedir-help)
  20.     )
  21. )
  22.  
  23. (set @dest (tackon @path "Istar"))
  24.  
  25. (if (NOT (exists @dest)))
  26.   (makedir @dest 
  27.       (infos)
  28.   )
  29.  
  30. (set @dest1 (tackon @dest "KBs"))
  31.  
  32. (if (NOT (exists @dest1)))
  33.   (makedir @dest1 
  34.       (infos)
  35.   )
  36.  
  37. (if (NOT (exists "fonts:topaz")))
  38.   (makedir "fonts:topaz" 
  39.     (infos)
  40.   )
  41.  
  42. (copylib
  43.     (prompt "Install iff library?")
  44.     (help "IFF library reads ILBM but is not essential to Istar.")
  45.     (source "iff.library")
  46.     (dest "libs:")
  47.     (confirm)
  48. )
  49.  
  50.  
  51. (copyfiles
  52.     (prompt "Install Istar fonts?")
  53.     (help "Istar needs CGTimes and Topaz11, though probably works without them")
  54.     (source "fonts")
  55.     (dest "fonts:")
  56.     (pattern "#?")
  57.         (files)
  58.     (confirm)
  59. )
  60.  
  61.  
  62. (if (NOT (exists "fonts:topaz")))
  63.   (makedir "fonts:topaz" 
  64.     (infos)
  65.   )
  66.  
  67. (copyfiles
  68.     (source "fonts/topaz")
  69.     (dest "fonts:topaz")
  70.     (pattern "#?")
  71.         (files)
  72. )
  73.  
  74. (copyfiles
  75.     (help "This will copy the Istar program")
  76.     (source "")
  77.     (dest @dest)
  78.         (pattern "Istar#?")
  79.     (files)
  80.         (infos)
  81.     (confirm)
  82. )
  83.  
  84. (copyfiles
  85.     (help "This will copy the Docs")
  86.     (source "docs")
  87.     (dest @dest)
  88.         (pattern "#?")
  89.     (files)
  90.         (infos)
  91.     (confirm)
  92. )
  93.  
  94. (copyfiles
  95.     (help "This will copy example KBs")
  96.     (source "KBs")
  97.     (dest @dest)
  98.         (pattern "#?")
  99.     (files)
  100.         (infos)
  101.     (confirm)
  102. )
  103.  
  104. (set @kbt-assign (cat "assign KBTools: " @dest))
  105.  
  106.  
  107. (startup "Istar"
  108.     (prompt "KBTools assign needs to be added to the \"S:user-startup\".")
  109.     (help "Not strictly necessary, but avoids annoying requester.")
  110.     (command @kbt-assign)
  111.  
  112. )
  113.  
  114.